home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 14 / Developer Source Volume 14 (I-MODE Publications, Inc.)(1999).iso / delpp / fig7-18.gif

< prev

next >

Graphics Interchange Format  |  1996-11-19  |  35KB  |  640x480  |  4-bit (15 colors)

Labels: text | screenshot | display | software | number
OCR: flit Delphi 2.0 Pntrmath × File Edit Search View Project Run Component Database Workgroups Tools Help Standard Additional Win95 Dialogs System Data Access Data Controls A ab] OK x Object Inspector x @ PNTRMTHF.PAS - O X Form3: TForm3 Pntrmthf Properties Events procedure TForm3. ButtonlClick ( Sender: TObject) ; ActiveControl Memo1 AutoScroll var True +Borderlcons [biSystemMenu, String[ 255]; BorderStyle bsSizeable p,q: PChar; b: Caption Form3 Byte; ClientHeight 273 ClientWidth begin 427 s : = ' Pointers are not really confusing. '; Color clBtnFace CH3C True p := @s; Cursor crDefault p : = p + 1; Enabled True q := p + 4; [TFont' Memol. Lines. Add ( 'The 1st & 5th characters are ' +Font FormStyle + p + ' and ' + q^) ; fsNormal Height 300 end; 1: 1 Insert Start Es Delphi32 Dy Microsoft ... 1 Delphi32 Exploring ... LES Writing

---